home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 1998 November / IRIX 6.5.2 Base Documentation November 1998.img / usr / share / catman / p_man / cat3 / f90 / compl.z / compl
Text File  |  1998-10-30  |  4KB  |  102 lines
  1. COMPL(3I)                                              Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      CCOOMMPPLL - Computes complement
  6.  
  7. SSYYNNOOPPSSIISS
  8.      CCOOMMPPLL (([II==]_i))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS, UNICOS/mk, and IRIX systems
  12.  
  13. SSTTAANNDDAARRDDSS
  14.      CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 90
  15.  
  16. DDEESSCCRRIIPPTTIIOONN
  17.      The CCOOMMPPLL intrinsic function computes the complement of _i.  It accepts
  18.      the following argument:
  19.  
  20.      _i    A Boolean, integer, real, logical, or Cray pointer value.
  21.  
  22.      CCOOMMPPLL is an elemental function.  The name of this intrinsic cannot be
  23.      passed as an argument.
  24.  
  25.      The following tables show both the logical complement and the bit-wise
  26.      logical complement:
  27.  
  28.      ------------------------------------
  29.      Logical        CCOOMMPPLL
  30.      Variable       (Logical Variable)
  31.      ------------------------------------
  32.            T                  F
  33.            F                  T
  34.      ------------------------------------
  35.  
  36.  
  37.      -----------------------------------
  38.      Bit of        CCOOMMPPLL
  39.      Variable      (Bit of Variable)
  40.      -----------------------------------
  41.           1                  0
  42.           0                  1
  43.      -----------------------------------
  44.  
  45. NNOOTTEESS
  46.      CCOOMMPPLL is outmoded.  Refer to the _F_o_r_t_r_a_n _L_a_n_g_u_a_g_e _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l,
  47.      _V_o_l_u_m_e _2, publication SR-3903, for information about outmoded features
  48.      and their preferred standard alternatives.
  49.  
  50. CCAAUUTTIIOONNSS
  51.      Unexpected results can occur when Boolean functions are declared
  52.      external and then used with logical arguments.  On UNICOS and
  53.      UNICOS/mk systems, the external Boolean functions always treat their
  54.      arguments as type Boolean and return a Boolean result.  On IRIX
  55.      systems, the result is an integer.
  56.  
  57. RREETTUURRNN VVAALLUUEESS
  58.      When given an argument of type logical, CCOOMMPPLL computes a logical
  59.      complement and returns a logical result.
  60.  
  61.      On UNICOS and UNICOS/mk systems, with an argument of type integer,
  62.      real, Boolean, or Cray pointer, CCOOMMPPLL computes a bit-wise logical
  63.      complement and returns a Boolean result.  No type conversion occurs.
  64.  
  65.      On IRIX systems, with an argument of type integer, real, Boolean, or
  66.      Cray Pointer, CCOOMMPPLL computes a bit-wise logical complement and returns
  67.      an integer result.
  68.  
  69. EEXXAAMMPPLLEESS
  70.      The following section of Fortran code shows the CCOOMMPPLL function used
  71.      with an argument of type logical:
  72.  
  73.           LOGICAL L1, L2
  74.           ...
  75.           L2 = COMPL(L1)
  76.  
  77.      The following section of Fortran code shows the CCOOMMPPLL function used
  78.      with an argument of type integer.  The bit patterns of the argument
  79.      and result are also given.  For clarity, only the rightmost 8 bits are
  80.      shown.
  81.  
  82.           INTEGER I1, I2
  83.           I1 = 240
  84.           ...
  85.           I2 = COMPL(I1)
  86.  
  87.  
  88.                  -------------------------------
  89.                 | 1 | 1 | 1 | 1 | 0 | 0 | 0 | 0 |
  90.                  -------------------------------
  91.                              I1
  92.  
  93.                  -------------------------------
  94.                 | 0 | 0 | 0 | 0 | 1 | 1 | 1 | 1 |
  95.                  -------------------------------
  96.                              I2
  97.  
  98. SSEEEE AALLSSOO
  99.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
  100.      printed version of this man page.
  101.  
  102.